﻿Public Class Eevolta

    Private _mostrarMenu As Boolean = True                  ' sirve para mostrar el menu. En el caso de proyecto la primera vez no muestra
    Private _descEmpresa As String                          ' nombre de la empresa
    Private _idUsuario As Int32                             ' es el id de usuario
    Private _descUsuario As String                          ' nombre del usuario
    Private _idProyecto As Int32                            ' es numero del proyecto
    Private _descProyecto As String                         ' es el nombre del proyecto
    Private _idEtapa As Int32                               ' es numero de la etapa
    Private _descEtapa As String                            ' es el nombre de la eatapa
    Private _chkVisible As Boolean = False                  ' sirve para mostrar los check en las consulta de los inmueble de la proforma
    Private _idPerfilUsuario As Int32 = 0                    ' sirve para saber su perfil del usuario

    Public Property mostrarMenu() As Boolean
        Get
            Return _mostrarMenu
        End Get
        Set(ByVal value As Boolean)
            _mostrarMenu = value
        End Set
    End Property
    Public Property descEmpresa() As String
        Get
            Return _descEmpresa
        End Get
        Set(ByVal value As String)
            _descEmpresa = value
        End Set
    End Property
    Public Property idUsuario() As Int32
        Get
            Return _idUsuario
        End Get
        Set(ByVal value As Int32)
            _idUsuario = value
        End Set
    End Property
    Public Property descUsuario() As String
        Get
            Return _descUsuario
        End Get
        Set(ByVal value As String)
            _descUsuario = value
        End Set
    End Property
    Public Property idProyecto() As Int32
        Get
            Return _idProyecto
        End Get
        Set(ByVal value As Int32)
            _idProyecto = value
        End Set
    End Property
    Public Property descProyecto() As String
        Get
            Return _descProyecto
        End Get
        Set(ByVal value As String)
            _descProyecto = value
        End Set
    End Property
    Public Property idEtapa() As Int32
        Get
            Return _idEtapa
        End Get
        Set(ByVal value As Int32)
            _idEtapa = value
        End Set
    End Property
    Public Property descEtapa() As String
        Get
            Return _descEtapa
        End Get
        Set(ByVal value As String)
            _descEtapa = value
        End Set
    End Property
    Public Property chkVisible() As Boolean
        Get
            Return _chkVisible
        End Get
        Set(ByVal value As Boolean)
            _chkVisible = value
        End Set
    End Property
    Public Property idPerfilUsuario() As Int32
        Get
            Return _idPerfilUsuario
        End Get
        Set(ByVal value As Int32)
            _idPerfilUsuario = value
        End Set
    End Property

End Class
